home *** CD-ROM | disk | FTP | other *** search
- ;-----------------------------------------------------------------------
- ; Beispiel eines FILLED-Vektorobjekt-Sourcecodes for including an
- ; Object made with THE SPECIAL BROTHERS Vectordesigner...
- ;-----------------------------------------------------------------------
- ; Normales Vektorobjekt
- ;-----------------------------------------------------------------------
- ;(Seka-format)
- ;Benutzung:
- ;a (return)
- ;ri (return)
- ;name.i (return)
- ;testpoints (return)
- ;(return)
- ;wi (return)
- ;name (return)
- ;start (return)
- ;end (return)
- ;Danach kann das Objekt vom Demomaker aus unter "name" eingeladen werden.
- ;------------------------------------------------------------------------
-
- start:
- dc.l "VECT" ;Kennung fuer Objekt!!!
-
- filledob2:
- dc.l TESTPOINTS-filledob2 ;offset zu Punktstruktur
- dc.l TESTFLAECHEN-filledob2 ;offset zu Flaechenstruktur
- dc.w 1200 ;zoom auf 300
- dc.w 0,$8,$a,$c,$44f,$f0f,$0f,$f00 ;8 Farben
- dc.b 1 ;0-normales Objekt
- dc.b 0 ;0-keine Syncronisation
- dc.w 0 ;jetzt ohne Funktion
- dc.l 0 ;keine Zusatzroutinen
- dc.l 0 ;...
-
- TESTPOINTS: ;Punktstruktur
-
- blk.b 1024,0
-
- TESTFLAECHEN: ;Flaechenstruktur
-
- blk.b 2048,0
-
- end:
-